CAADynamicalTime_TT2UT1 <-
function(JD){.Call("CAADynamicalTime_TT2UT1", JD)}
